Chip 2004 December/2004-12 CHIP.iso/Dom i biuro/AlfaClock 1.71/alfaclock_v1.71.exe/{app}/AlfaClock.exe/0/RCDATA/TATOMICCLOCK/TATOMICCLOCK.txt

Text File | 2004-10-05 | 9KB | 397 lines

object AtomicClock: TAtomicClock
  Left = 0
  Top = 0
  Width = 560
  Height = 470
  TabOrder = 0
  object GroupBox_ManualAdjust: TGroupBox
    Left = 0
    Top = 24
    Width = 450
    Height = 103
    Caption = 'Manual Adjust'
    TabOrder = 0
    object Shape1: TShape
      Left = 70
      Top = 22
      Width = 280
      Height = 17
      Brush.Color = clGray
    end
    object Label_LocalTimeCaption: TLabel
      Left = 13
      Top = 24
      Width = 51
      Height = 13
      Alignment = taRightJustify
      Caption = 'Local time:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Shape2: TShape
      Left = 70
      Top = 46
      Width = 280
      Height = 17
      Brush.Color = clGray
    end
    object Label_ExactTimeCaption: TLabel
      Left = 12
      Top = 48
      Width = 52
      Height = 13
      Alignment = taRightJustify
      Caption = 'Exact time:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Shape3: TShape
      Left = 70
      Top = 70
      Width = 280
      Height = 17
      Brush.Color = clGray
    end
    object Label_DifferenceCaption: TLabel
      Left = 13
      Top = 72
      Width = 51
      Height = 13
      Alignment = taRightJustify
      Caption = 'Correction:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label_LocalTime: TLabel
      Left = 70
      Top = 24
      Width = 280
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = 'Label_LocalTime'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label_ExactTime: TLabel
      Left = 70
      Top = 48
      Width = 280
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = 'Label_ExactTime'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label_Difference: TLabel
      Left = 70
      Top = 72
      Width = 280
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = 'Label_Difference'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Button_GetTime: TButton
      Left = 361
      Top = 26
      Width = 75
      Height = 25
      Caption = 'Get Time'
      Default = True
      TabOrder = 0
      OnClick = Button_GetTimeClick
    end
    object Button_Adjust: TButton
      Left = 361
      Top = 58
      Width = 75
      Height = 25
      Caption = 'Adjust'
      TabOrder = 1
      OnClick = Button_AdjustClick
    end
  end
  object GroupBox_AdvancedSettings: TGroupBox
    Left = 0
    Top = 132
    Width = 450
    Height = 218
    Caption = 'Advanced Settings'
    TabOrder = 1
    object Label_AutoAdjustCaption: TLabel
      Left = 16
      Top = 46
      Width = 106
      Height = 13
      Caption = 'Adjust time periodically'
    end
    object Label_AdjustMethodCaption: TLabel
      Left = 16
      Top = 90
      Width = 67
      Height = 13
      Caption = 'Adjust method'
    end
    object Label_ActiveProtocolCaption: TLabel
      Left = 16
      Top = 134
      Width = 71
      Height = 13
      Caption = 'Active protocol'
    end
    object Bevel2: TBevel
      Left = 200
      Top = 16
      Width = 9
      Height = 193
      Shape = bsLeftLine
    end
    object Label_SOCKSVersionCaption: TLabel
      Left = 232
      Top = 52
      Width = 35
      Height = 13
      Caption = 'Version'
    end
    object Label_ProxyHostCaption: TLabel
      Left = 232
      Top = 76
      Width = 38
      Height = 13
      Caption = 'Address'
    end
    object Label_ProxyUsernameCaption: TLabel
      Left = 232
      Top = 156
      Width = 48
      Height = 13
      Caption = 'Username'
    end
    object Label_ProxyPasswordCaption: TLabel
      Left = 232
      Top = 180
      Width = 46
      Height = 13
      Caption = 'Password'
    end
    object Label_ProxyPortCaption: TLabel
      Left = 232
      Top = 100
      Width = 19
      Height = 13
      Caption = 'Port'
    end
    object Button_EditTimeServersList: TButton
      Left = 78
      Top = 178
      Width = 107
      Height = 25
      Caption = 'Time Servers ...'
      TabOrder = 4
      OnClick = Button_EditTimeServersListClick
    end
    object ComboBox_AutoAdjustInterval: TComboBox
      Left = 16
      Top = 62
      Width = 169
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnChange = ComboBox_AutoAdjustIntervalChange
      Items.Strings = (
        'never'
        'hourly'
        'every 2 hours'
        'every 3 hours'
        'every 4 hours'
        'every 6 hours'
        'every 8 hours'
        'every 12 hours')
    end
    object ComboBox_AdjustMethod: TComboBox
      Left = 16
      Top = 106
      Width = 169
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 2
      OnChange = ComboBox_AdjustMethodChange
      Items.Strings = (
        'Time only'
        'Minutes and Seconds only'
        'both Date and Time')
    end
    object ComboBox_ActiveProtocol: TComboBox
      Left = 16
      Top = 150
      Width = 169
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 3
      OnChange = ComboBox_ActiveProtocolChange
      Items.Strings = (
        'SNTP Protocol (RFC 2030)'
        'Time Protocol (RFC 868)')
    end
    object CheckBox_UseProxy: TCheckBox
      Left = 216
      Top = 24
      Width = 193
      Height = 17
      Caption = 'Use proxy (for Time Protocol only)'
      TabOrder = 5
      OnClick = CheckBox_UseProxyClick
    end
    object ComboBox_SOCKSVersion: TComboBox
      Left = 296
      Top = 48
      Width = 137
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 6
      OnChange = ComboBox_SOCKSVersionChange
      Items.Strings = (
        'SOCKS v4.0'
        'SOCKS v4.0A'
        'SOCKS v5.0')
    end
    object Edit_ProxyHost: TEdit
      Left = 296
      Top = 72
      Width = 137
      Height = 21
      TabOrder = 7
      OnChange = Edit_ProxyHostChange
    end
    object Edit_ProxyPort: TEdit
      Left = 296
      Top = 96
      Width = 73
      Height = 21
      TabOrder = 8
      OnChange = Edit_ProxyPortChange
    end
    object CheckBox_UseProxyAuthentication: TCheckBox
      Left = 216
      Top = 128
      Width = 193
      Height = 17
      Caption = 'Proxy authentication'
      TabOrder = 9
      OnClick = CheckBox_UseProxyAuthenticationClick
    end
    object Edit_ProxyUsername: TEdit
      Left = 296
      Top = 152
      Width = 137
      Height = 21
      TabOrder = 10
      OnChange = Edit_ProxyUsernameChange
    end
    object Edit_ProxyPassword: TEdit
      Left = 296
      Top = 176
      Width = 137
      Height = 21
      PasswordChar = '*'
      TabOrder = 11
      OnChange = Edit_ProxyPasswordChange
    end
    object CheckBox_AdjustOnConnect: TCheckBox
      Left = 16
      Top = 24
      Width = 169
      Height = 17
      Caption = 'Adjust on Connect'
      TabOrder = 0
      OnClick = CheckBox_AdjustOnConnectClick
    end
  end
  object Panel_Caption: TPanel
    Left = 0
    Top = 0
    Width = 450
    Height = 20
    BevelOuter = bvNone
    TabOrder = 2
    object Shap_Caption: TShape
      Left = 0
      Top = 0
      Width = 450
      Height = 20
      Align = alClient
      Brush.Color = 12937777
    end
    object Label_Caption: TLabel
      Left = 6
      Top = 1
      Width = 82
      Height = 16
      Caption = 'Atomic Clock'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object Timer_State: TTimer
    OnTimer = Timer_StateTimer
    Left = 8
    Top = 308
  end
  object Timer_AutoAdjust: TTimer
    Interval = 5000
    OnTimer = Timer_AutoAdjustTimer
    Left = 40
    Top = 308
  end
  object FnugryRASNotify: TFnugryRASNotify
    Enabled = True
    PollInterval = 2000
    OnConnected = FnugryRASNotifyConnected
    Left = 168
    Top = 148
  end
end